(defrule defPerfil0 (or (InteresProfesional Informatica) (InteresProfesional Telecomunicaciones) )=>(assert (Perfil Tecnico) )(retract-string "(InteresProfesional Informatica)") (retract-string "(InteresProfesional Telecomunicaciones)") )
(defrule defPerfil1 (or (InteresProfesional Economia) (InteresProfesional Derecho) )=>(assert (Perfil Administrativo) )(retract-string "(InteresProfesional Economia)") (retract-string "(InteresProfesional Derecho)") )
(defrule defPerfil2 (or (InteresProfesional Hosteleria) (InteresProfesional Turismo) )=>(assert (Perfil Servicios) )(retract-string "(InteresProfesional Hosteleria)") (retract-string "(InteresProfesional Turismo)") )
(defrule defPerfil3 (InteresProfesional Salud) =>(assert (Perfil Sanitario) )(retract-string "(InteresProfesional Salud)") )
(defrule defIdioma1 (and (NivelHablado Alto) (NivelEscrito Alto) )=> (assert(Idioma Alto)) (retract-string "(NivelHablado Alto)")(retract-string "(NivelEscrito Alto)"))
(defrule defIdioma2 (and (NivelHablado Alto) (NivelEscrito Medio) )=> (assert(Idioma Alto)) (retract-string "(NivelHablado Alto)")(retract-string "(NivelEscrito Medio)"))
(defrule defIdioma3 (and (NivelHablado Medio) (NivelEscrito Alto) )=> (assert(Idioma Alto)) (retract-string "(NivelHablado Medio)")(retract-string "(NivelEscrito Alto)"))
(defrule defIdioma4 (and (NivelHablado Medio) (NivelEscrito Medio) )=> (assert(Idioma Medio)) (retract-string "(NivelHablado Medio)")	(retract-string "(NivelEscrito Medio)"))
(defrule defIdioma5 (and (NivelHablado Bajo) (NivelEscrito Medio) )=> (assert(Idioma Medio)) (retract-string "(NivelHablado Bajo)")(retract-string "(NivelEscrito Medio)"))
(defrule defIdioma6 (and (NivelHablado Medio) (NivelEscrito Bajo) )=> (assert(Idioma Medio)) (retract-string "(NivelHablado Medio)")(retract-string "(NivelEscrito Bajo)"))
(defrule defIdioma7 (and (NivelHablado Bajo)  (NivelEscrito Bajo) )=> (assert(Idioma Bajo)) (retract-string "(NivelHablado Bajo)")(retract-string "(NivelEscrito Bajo)"))
(defrule defNivelProfesional0 (and (Experiencia 0) (Estudios ESO) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios ESO)") )
(defrule defNivelProfesional1 (and (Experiencia 0) (Estudios ESO) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios ESO)") )
(defrule defNivelProfesional2 (and (Experiencia 0) (Estudios Bachillerato) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional3 (and (Experiencia 0) (Estudios Bachillerato) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional4 (and (Experiencia 0) (Estudios Bachillerato) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional5 (and (Experiencia 0) (Estudios FPGradoMedio) )=>(assert (NivelProfesional B0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios FPGradoMedio)") )
(defrule defNivelProfesional6 (and (Experiencia 0) (Estudios FPGradoMedio) )=>(assert (NivelProfesional B0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios FPGradoMedio)") )
(defrule defNivelProfesional7 (and (Experiencia 0) (Estudios FPGradoSuperior) )=>(assert (NivelProfesional B0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios FPGradoSuperior)") )
(defrule defNivelProfesional8 (and (Experiencia 0) (Estudios Diplomatura) )=>(assert (NivelProfesional C0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios Diplomatura)") )
(defrule defNivelProfesional9 (and (Experiencia 0) (Estudios Licenciatura) )=>(assert (NivelProfesional C0) )(retract-string "(Experiencia 0)") (retract-string "(Estudios Licenciatura)") )
(defrule defNivelProfesional10 (and (Experiencia unodos) (Estudios ESO) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia unodos)") (retract-string "(Estudios ESO)") )
(defrule defNivelProfesional11 (and (Experiencia unodos) (Estudios Bachillerato) )=>(assert (NivelProfesional A0) )(retract-string "(Experiencia unodos)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional12 (and (Experiencia unodos) (Estudios FPGradoMedio) )=>(assert (NivelProfesional B0) )(retract-string "(Experiencia unodos)") (retract-string "(Estudios FPGradoMedio)") )
(defrule defNivelProfesional13 (and (Experiencia unodos) (Estudios FPGradoSuperior) )=>(assert (NivelProfesional B0) )(retract-string "(Experiencia unodos)") (retract-string "(Estudios FPGradoSuperior)") )
(defrule defNivelProfesional14 (and (Experiencia unodos) (Estudios Diplomatura) )=>(assert (NivelProfesional C1) )(retract-string "(Experiencia unodos)") (retract-string "(Estudios Diplomatura)") )
(defrule defNivelProfesional15 (and (Experiencia unodos) (Estudios Licenciatura) )=>(assert (NivelProfesional C1) )(retract-string "(Experiencia unodos)") (retract-string "(Estudios Licenciatura)") )
(defrule defNivelProfesional16 (and (Experiencia trescinco) (Estudios ESO) )=>(assert (NivelProfesional A1) )(retract-string "(Experiencia trescinco)") (retract-string "(Estudios ESO)") )
(defrule defNivelProfesional17 (and (Experiencia trescinco) (Estudios Bachillerato) )=>(assert (NivelProfesional A1) )(retract-string "(Experiencia trescinco)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional18 (and (Experiencia trescinco) (Estudios FPGradoMedio) )=>(assert (NivelProfesional B1) )(retract-string "(Experiencia trescinco)") (retract-string "(Estudios FPGradoMedio)") )
(defrule defNivelProfesional19 (and (Experiencia trescinco) (Estudios FPGradoSuperior) )=>(assert (NivelProfesional B1) )(retract-string "(Experiencia trescinco)") (retract-string "(Estudios FPGradoSuperior)") )
(defrule defNivelProfesional20 (and (Experiencia trescinco) (Estudios Diplomatura) )=>(assert (NivelProfesional C2) )(retract-string "(Experiencia trescinco)") (retract-string "(Estudios Diplomatura)") )
(defrule defNivelProfesional21 (and (Experiencia trescinco) (Estudios Licenciatura) )=>(assert (NivelProfesional C2) )(retract-string "(Experiencia trescinco)") (retract-string "(Estudios Licenciatura)") )
(defrule defNivelProfesional22 (and (Experiencia seisdiez) (Estudios ESO) )=>(assert (NivelProfesional A2) )(retract-string "(Experiencia seisdiez)") (retract-string "(Estudios ESO)") )
(defrule defNivelProfesional23 (and (Experiencia seisdiez) (Estudios Bachillerato) )=>(assert (NivelProfesional A3) )(retract-string "(Experiencia seisdiez)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional24 (and (Experiencia seisdiez) (Estudios FPGradoMedio) )=>(assert (NivelProfesional B1) )(retract-string "(Experiencia seisdiez)") (retract-string "(Estudios FPGradoMedio)") )
(defrule defNivelProfesional25 (and (Experiencia seisdiez) (Estudios FPGradoSuperior) )=>(assert (NivelProfesional B1) )(retract-string "(Experiencia seisdiez)") (retract-string "(Estudios FPGradoSuperior)") )
(defrule defNivelProfesional26 (and (Experiencia seisdiez) (Estudios Diplomatura) )=>(assert (NivelProfesional C2) )(retract-string "(Experiencia seisdiez)") (retract-string "(Estudios Diplomatura)") )
(defrule defNivelProfesional27 (and (Experiencia seisdiez) (Estudios Licenciatura) )=>(assert (NivelProfesional C3) )(retract-string "(Experiencia seisdiez)") (retract-string "(Estudios Licenciatura)") )
(defrule defNivelProfesional28 (and (Experiencia masdiez) (Estudios ESO) )=>(assert (NivelProfesional A3) )(retract-string "(Experiencia masdiez)") (retract-string "(Estudios ESO)") )
(defrule defNivelProfesional29 (and (Experiencia masdiez) (Estudios Bachillerato) )=>(assert (NivelProfesional A3) )(retract-string "(Experiencia masdiez)") (retract-string "(Estudios Bachillerato)") )
(defrule defNivelProfesional30 (and (Experiencia masdiez) (Estudios FPGradoMedio) )=>(assert (NivelProfesional B2) )(retract-string "(Experiencia masdiez)") (retract-string "(Estudios FPGradoMedio)") )
(defrule defNivelProfesional31 (and (Experiencia masdiez) (Estudios FPGradoSuperior) )=>(assert (NivelProfesional B2) )(retract-string "(Experiencia masdiez)") (retract-string "(Estudios FPGradoSuperior)") )
(defrule defNivelProfesional32 (and (Experiencia masdiez) (Estudios Diplomatura) )=>(assert (NivelProfesional C3) )(retract-string "(Experiencia masdiez)") (retract-string "(Estudios Diplomatura)") )
(defrule defNivelProfesional33 (and (Experiencia masdiez) (Estudios Licenciatura) )=>(assert (NivelProfesional C4) )(retract-string "(Experiencia masdiez)") (retract-string "(Estudios Licenciatura)") )
(defrule defTipoCV0 (and (NivelProfesional A0) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV Basico) )(retract-string "(NivelProfesional A0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV1 (and (NivelProfesional A0) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV Basico) )(retract-string "(NivelProfesional A0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV2 (and (NivelProfesional A0) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV Basico) )(retract-string "(NivelProfesional A0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV3 (and (NivelProfesional A0) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV Basico) )(retract-string "(NivelProfesional A0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV4 (and (NivelProfesional A0) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV BasicoSinIdioma) )(retract-string "(NivelProfesional A0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV5 (and (NivelProfesional A0) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV BasicoSinIdioma) )(retract-string "(NivelProfesional A0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV6 (and (NivelProfesional A1) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV BasicoExp) )(retract-string "(NivelProfesional A1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV7 (and (NivelProfesional A1) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV BasicoExp) )(retract-string "(NivelProfesional A1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV8 (and (NivelProfesional A1) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV BasicoExp) )(retract-string "(NivelProfesional A1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV9 (and (NivelProfesional A1) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV BasicoExp) )(retract-string "(NivelProfesional A1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV10 (and (NivelProfesional A1) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV BasicoExpSinIdioma) )(retract-string "(NivelProfesional A1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV11 (and (NivelProfesional A1) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV BasicoExpSinIdioma) )(retract-string "(NivelProfesional A1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV12 (and (NivelProfesional A2) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV13 (and (NivelProfesional A2) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV14 (and (NivelProfesional A2) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV15 (and (NivelProfesional A2) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV16 (and (NivelProfesional A2) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV ExpBasicoSinIdiomas) )(retract-string "(NivelProfesional A2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV17 (and (NivelProfesional A2) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV ExpBasicoSinIdiomas) )(retract-string "(NivelProfesional A2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV18 (and (NivelProfesional A3) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A3)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV19 (and (NivelProfesional A3) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A3)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV20 (and (NivelProfesional A3) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A3)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV21 (and (NivelProfesional A3) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV ExpBasico) )(retract-string "(NivelProfesional A3)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV22 (and (NivelProfesional A3) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV ExpBasicoSinIdiomas) )(retract-string "(NivelProfesional A3)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV23 (and (NivelProfesional A3) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV ExpBasicoSinIdiomas) )(retract-string "(NivelProfesional A3)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV24 (and (NivelProfesional B0) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV25 (and (NivelProfesional B0) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV26 (and (NivelProfesional B0) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV27 (and (NivelProfesional B0) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV28 (and (NivelProfesional B0) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV29 (and (NivelProfesional B0) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV30 (and (NivelProfesional B0) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV31 (and (NivelProfesional B0) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV32 (and (NivelProfesional B0) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV33 (and (NivelProfesional B0) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV34 (and (NivelProfesional B0) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV35 (and (NivelProfesional B0) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional B0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV36 (and (NivelProfesional B1) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV37 (and (NivelProfesional B1) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV38 (and (NivelProfesional B1) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV39 (and (NivelProfesional B1) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV40 (and (NivelProfesional B1) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV41 (and (NivelProfesional B1) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV42 (and (NivelProfesional B1) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV43 (and (NivelProfesional B1) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV44 (and (NivelProfesional B1) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV45 (and (NivelProfesional B1) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV46 (and (NivelProfesional B1) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV47 (and (NivelProfesional B1) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional B1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV48 (and (NivelProfesional B2) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV49 (and (NivelProfesional B2) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV50 (and (NivelProfesional B2) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV51 (and (NivelProfesional B2) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV52 (and (NivelProfesional B2) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV53 (and (NivelProfesional B2) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV54 (and (NivelProfesional B2) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV55 (and (NivelProfesional B2) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV56 (and (NivelProfesional B2) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV57 (and (NivelProfesional B2) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV58 (and (NivelProfesional B2) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV59 (and (NivelProfesional B2) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional B2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV60 (and (NivelProfesional C0) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV61 (and (NivelProfesional C0) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV62 (and (NivelProfesional C0) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV63 (and (NivelProfesional C0) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV64 (and (NivelProfesional C0) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV65 (and (NivelProfesional C0) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV66 (and (NivelProfesional C0) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV67 (and (NivelProfesional C0) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV Especialidad) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV68 (and (NivelProfesional C0) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV69 (and (NivelProfesional C0) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV70 (and (NivelProfesional C0) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV71 (and (NivelProfesional C0) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadSinIdiomas) )(retract-string "(NivelProfesional C0)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV72 (and (NivelProfesional C1) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV73 (and (NivelProfesional C1) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV74 (and (NivelProfesional C1) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV75 (and (NivelProfesional C1) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV76 (and (NivelProfesional C1) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV77 (and (NivelProfesional C1) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV78 (and (NivelProfesional C1) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV79 (and (NivelProfesional C1) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadExp) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV80 (and (NivelProfesional C1) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV81 (and (NivelProfesional C1) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV82 (and (NivelProfesional C1) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV83 (and (NivelProfesional C1) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV EspecialidadExpSinIdiomas) )(retract-string "(NivelProfesional C1)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV84 (and (NivelProfesional C2) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV85 (and (NivelProfesional C2) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV86 (and (NivelProfesional C2) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV87 (and (NivelProfesional C2) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV88 (and (NivelProfesional C2) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV89 (and (NivelProfesional C2) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV90 (and (NivelProfesional C2) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV91 (and (NivelProfesional C2) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV92 (and (NivelProfesional C2) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV93 (and (NivelProfesional C2) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV94 (and (NivelProfesional C2) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV95 (and (NivelProfesional C2) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C2)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV96 (and (NivelProfesional C3) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV97 (and (NivelProfesional C3) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV98 (and (NivelProfesional C3) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV99 (and (NivelProfesional C3) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV100 (and (NivelProfesional C3) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV101 (and (NivelProfesional C3) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV102 (and (NivelProfesional C3) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV103 (and (NivelProfesional C3) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV104 (and (NivelProfesional C3) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV105 (and (NivelProfesional C3) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV106 (and (NivelProfesional C3) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV107 (and (NivelProfesional C3) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C3)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV108 (and (NivelProfesional C4) (Idioma Alto) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV109 (and (NivelProfesional C4) (Idioma Alto) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV110 (and (NivelProfesional C4) (Idioma Alto) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV111 (and (NivelProfesional C4) (Idioma Alto) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Alto)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV112 (and (NivelProfesional C4) (Idioma Medio) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV113 (and (NivelProfesional C4) (Idioma Medio) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV114 (and (NivelProfesional C4) (Idioma Medio) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV115 (and (NivelProfesional C4) (Idioma Medio) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidad) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Medio)") (retract-string "(Perfil Tecnico)") )
(defrule defTipoCV116 (and (NivelProfesional C4) (Idioma Bajo) (Perfil Administrativo) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Administrativo)") )
(defrule defTipoCV117 (and (NivelProfesional C4) (Idioma Bajo) (Perfil Sanitario) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Sanitario)") )
(defrule defTipoCV118 (and (NivelProfesional C4) (Idioma Bajo) (Perfil Servicios) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Servicios)") )
(defrule defTipoCV119 (and (NivelProfesional C4) (Idioma Bajo) (Perfil Tecnico) )=>(assert (TipoCV ExpEspecialidadSinIdiomas) )(retract-string "(NivelProfesional C4)") (retract-string "(Idioma Bajo)") (retract-string "(Perfil Tecnico)") )



(defrule defDondeBuscar0 (TipoCV Basico) =>
(assert (DondeBuscar INEM) )
(assert (DondeBuscar Extranjero))
 (assert (DondeBuscar ETT))
 (assert (DondeBuscar PaginaWebG))
(call ?*writer* write  "Tienes que buscar en web de informacion general , INEM , ETT y en el extrajero"  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV Basico)"))



(defrule defDondeBuscar1
(TipoCV BasicoSinIdioma)
=> (assert (DondeBuscar INEM) )
 (assert (DondeBuscar ETT))
(assert (DondeBuscar PaginaWebG))
(call ?*writer* write  "Tienes que buscar en web de informacion general , INEM y ETT"  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV BasicoSinIdioma)"))

(defrule defDondeBuscar2
(TipoCV BasicoExp)
 =>( assert (DondeBuscar INEM) )
(assert (DondeBuscar Extranjero) )
(assert (DondeBuscar ETT) )
(assert (DondeBuscar PaginaWebG))
(call ?*writer* write  "Tienes que buscar en web de informacion general,INEM,ETT y en el extranjero"  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV BasicoExp)")
)


(defrule defDondeBuscar3
(TipoCV BasicoExpSinIdioma)
 => (assert (DondeBuscar INEM) )
(assert (DondeBuscar ETT) )
(assert (DondeBuscar PaginaWebG)) 
(call ?*writer* write  "Tienes que buscar en web de informacion general,ETT e INEM"  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV BasicoExpSinIdioma)"))

(defrule defDondeBuscar4
(TipoCV ExpBasico)
=> (assert (DondeBuscar INEM) )
(assert (DondeBuscar PaginaWebG) )
(assert (DondeBuscar Extranjero) )
(call ?*writer* write  "Tienes que buscar en el extrajero,INEM y pagina web de informacion general"  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV ExpBasico)") )


(defrule defDondeBuscar5
(TipoCV ExpBasicoSinIdioma)
 =>
(assert (DondeBuscar INEM) )
 (assert (DondeBuscar PaginaWebG) )
(call ?*writer* write  "Tienes que buscar en web de informacion general y en el INEM"  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV ExpBasicoSinIdioma)"))


(defrule defDondeBuscar6 (TipoCV Especialidad)
=> (assert (DondeBuscar INEM) )
(assert (DondeBuscar Extranjero) )
(assert (DondeBuscar PaginaWebEsp) ) 
(call ?*writer* write  "Tienes que buscar en web Especializada, en el extranjero y en el INEM."  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV Especialidad)"))


(defrule defDondeBuscar7
(TipoCV EspecialidadSinIdioma)
 => (assert (DondeBuscar INEM) )
 (assert (DondeBuscar PaginaWebEsp)) 
(call ?*writer* write  "Tienes que buscar en web Especializada y en el INEM."  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV EspecialidadSinIdioma)"))

(defrule defDondeBuscar8 (TipoCV EspecialidadExp)
=> (assert (DondeBuscar INEM) )
(assert (DondeBuscar Extranjero) )
(assert (DondeBuscar PaginaWebEsp) )
(call ?*writer* write  "Tienes que buscar en web Especializada,en el extranjero y en el INEM."  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV EspecialidadExp)"))

(defrule defDondeBuscar9
(TipoCV EspecialidadExpSinIdioma)
 => (assert (DondeBuscar PaginaWebEsp) )
(call ?*writer* write  "Tienes que buscar en web Especializada."  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV EspecialidadExpSinIdioma)"))

(defrule defDondeBuscar10
(TipoCV ExpEspecialidad)
 => (assert (DondeBuscar Extranjero) )
 (assert (DondeBuscar PaginaWebEsp) )
(call ?*writer* write  "Tienes que buscar en web Especializada y en el extranjero."  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV ExpEspecialidad)")
)


(defrule defDondeBuscar11 (TipoCV ExpEspecialidadSinIdioma) =>
(assert (DondeBuscar PaginaWebEsp) )
(call ?*writer* write  "Tienes que buscar en web Especializada."  )
    (call ?*writer* newLine)
    (call ?*writer* close)
(retract-string "(TipoCV ExpEspecialidadSinIdioma)"))

(defglobal ?*file* = ( new java.io.OutputStreamWriter ( new java.io.FileOutputStream "C://salida.txt" ) ) )
(defglobal ?*writer* = ( new java.io.BufferedWriter ?*file* ) )

(run)
